home *** CD-ROM | disk | FTP | other *** search
Text File | 1989-09-18 | 2.2 KB | 96 lines | [TEXT/QED1] |
- * This is an early FSP COntrol from Ed Edell.
- * It does not use macros or symbols. -- Tom K.
- *
- * For an example of what this does,
- * call the "Keeper of the Lists" BBS
- * at (201) 677-9815 8pm - 9 am - EEE
- *
- * The "DL" section
- *
- LOAD "DataFrame 20:BBS:Sections:DL"
- PURGE
- CHECK/PATH
- PURGE
- SORT/DATE
- DELETE/DUPS
- PURGE
- FORMAT "TI:20+'size:'+SIZEK:10+'date:'+DA:10+'type:'+TY:CR:'description:'+DES"
- SAVETEXT/FORMAT "DL-DATE"
- SORT/TITLE
- SAVETEXT/FORMAT "DL-NAME"
- SAVE "DataFrame 20:BBS:Sections:DL"
- SAVE "DataFrame 20:BBS:BU Sections: BU DL"
- CLEAR
- *
- * The "UL" section
- *
- LOAD "DataFrame 20:BBS:Sections:UL"
- PURGE
- CHECK/PATH
- PURGE
- SORT/DATE
- DELETE/DUPS
- PURGE
- FORMAT "TI:20+'size:'+SIZEK:10+'date:'+DA:10+'type:'+TY:CR:'description:'+DES"
- SAVETEXT/FORMAT "UL-DATE"
- SORT/TITLE
- SAVETEXT/FORMAT "UL-NAME"
- SAVE "DataFrame 20:BBS:Sections:UL"
- SAVE "DataFrame 20:BBS:BU Sections:BU UL"
- CLEAR
- *
- * The "LibraryDL" section
- *
- LOAD "DataFrame 20:BBS:Sections:LibraryDL"
- PURGE
- CHECK/PATH
- PURGE
- SORT/DATE
- DELETE/DUPS
- PURGE
- FORMAT "TI:20+'size:'+SIZEK:10+'date:'+DA:10+'type:'+TY:CR:'description:'+DES"
- SAVETEXT/FORMAT "LibraryDL-DATE"
- SORT/TITLE
- SAVETEXT/FORMAT "LibraryDL-NAME"
- SAVE "DataFrame 20:BBS:Sections:LibraryDL"
- SAVE "DataFrame 20:BBS:BU Sections:BU LibraryDL"
- CLEAR
- *
- * The "LibraryUL" section
- *
- LOAD "DataFrame 20:BBS:Sections:LibraryUL"
- PURGE
- CHECK/PATH
- PURGE
- SORT/DATE
- DELETE/DUPS
- PURGE
- FORMAT "TI:20+'size:'+SIZEK:10+'date:'+DA:10+'type:'+TY:CR:'description:'+DES"
- SAVETEXT/FORMAT "LibraryUL-DATE"
- SORT/TITLE
- SAVETEXT/FORMAT "LibraryUL-NAME"
- SAVE "DataFrame 20:BBS:Sections:LibraryUL"
- SAVE "DataFrame 20:BBS:BU Sections:BU LibraryUL"
- CLEAR
- *
- * "EDS" section
- *
- LOAD "DataFrame 20:BBS:Sections:EDS"
- PURGE
- CHECK/PATH
- PURGE
- SORT/DATE
- DELETE/DUPS
- PURGE
- FORMAT "TI:20+'size:'+SIZEK:10+'date:'+DA:10+'type:'+TY:CR:'description:'+DES"
- SAVETEXT/FORMAT "EDS-DATE"
- SORT/TITLE
- SAVETEXT/FORMAT "EDS-NAME"
- SAVE "DataFrame 20:BBS:Sections:EDS"
- SAVE "DataFrame 20:BBS:BU Sections: BU EDS"
- CLEAR
- *
- * Now launch "Red Ryder Host"
- *
- LAUNCH "Red Ryder Host"